home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
basic
/
menurtns.zip
/
MENURTNS.DOC
< prev
next >
Wrap
Text File
|
1990-07-21
|
6KB
|
169 lines
MENURTNS.DOC for MENURTNS.QLB and MENURTNS.LIB
The following documentation explains and gives examples of paramaters
to pass to the Functions available in this QuickBASIC Library. The
following QuickBASIC Library contains seven routines as follows:
GetTime$()
This function can be used just as you would the DOS and BASICA TIME$
Function. GetTime$ returns the time as 12 hour clock with am or pm.
EXAMPLE: PRINT GetTime$ could return "10:57 am"
GetDate$()
This function can be used just as you would the DOS and BASICA DATE$ Function. GetDate$ returns the date as long international.
EXAMPLE: PRINT GetDate$ could return "August 25, 1990"
Shadow%(Row%, Col%)
This function will replace any character at the given location,
including blinking characters with the same character as Grey on Black.
EXAMPLE: Dummy = Shadow%(10, 10) would return a Grey on Black
character if one exists.
WaitKey$(Row%, Col%, WaitText$)
This function will print the WaitText$ string at Row%, Col% on the
screen, wait for a key press and then return whatever key was pressed.
EXAMPLE:
DO
Response$ = WaitKey$(10, 10, "Press RETURN to continue")
LOOP UNTIL Response$ = CHR$(13)
MenuBar%(Row%, Col%, MenuStr$, FgColor%, BgColor%, ReversedColor%)
This function will return the Integer number of the selection choosen.
The MenuBar% function automatically makes a one line menu with a
highlighted section of the bar that scrolls around the menu, or you can
choose a menu selection from the Hot keys which is the first letter of
each selection if Capitalized. Colors are set within the parameters but
the Highlighted Foreground color will always be High-Intensity White.
EXAMPLE:
MenuStr$ = " Help Menu-2 Time Date Quit "
SELECT CASE MenuBar%(10, 10, MenuStr$, Black, Cyan, Red)
CASE 1
This would be the Help selection
CASE 2
This would be the Menu-2 selection
CASE 3
This would be the Time selection
CASE 4
This would be the Date selection
CASE else
This would be the Quit selection
END SELECT
(Page 1)
MenuWindow%(Row%, Col%, ShadDir$, MenuTitle$, MenuStr$, OutLineColor%,_
WindowBgColor%, WindowFgColor%, ReversedColor%)
This function will return the Integer number of the selection choosen.
The MenuWindow% function automatically makes a window menu with a
highlighted section of the bar that scrolls up and down through the menu,
or you can choose a menu selection from the Hot keys which is the first
letter of each selection if Capitalized. Colors are set within the
parameters but the Highlighted Foreground color will always be
High-Intensity White. Also, a shadow can be specified with upper or
lower case "L" for left side, "R" for Right side or "" for no shadow.
The Menu Title will automatically be centered and truncated if
necessary to fit it within the box top.
EXAMPLE:
MenuStr$ = " Help Menu-2 Time Date Quit "
SELECT CASE MenuWindow%(10, 10, "L", "MENU TITLE", MenuStr$, Blue,_
Cyan, Black, Red)
CASE 1
This would be the Help selection
CASE 2
This would be the Menu-2 selection
CASE 3
This would be the Time selection
CASE 4
This would be the Date selection
CASE else
This would be the Quit selection
END SELECT
DrawBox(URow%, UCol%, LRow%, LCol%, ShadDir$, BoxTitle$, OutLineColor%,_
WindowBgColor%, WindowFgColor%)
The DrawBox sub will draw a box at the given location specified by
the upper left corner and the lower right corner. Colors are set
within the parameters. Also, a shadow can be specified with upper or
lower case "L" for left side, "R" for Right side or "" for no shadow.
The Box Title will automatically be centered and truncated if necessary
to fit it within the box top.
EXAMPLE:
CALL DrawBox(2, 9, 14, 74, "l", "BOX TITLE", Blue, Cyan, White + Bright)
NOTE:
As a QuickBASIC hobbyist programmer, I'm sure that anyone that has
received this Library is, or is on the way to becoming a QuickBASIC
programming enthusiast also. This is my first attempt at a SHAREWARE
product, and will more than likely determine if I will produce any more
software for SHAREWARE.
As seen above, I have created several functions that may enhance many
programs that other programmers such as yourself has spent many hours
creating. So, below I have created a Registration form for anyone that
thinks they may use any of these routines in programs for other than your
own use. If your just going to use these routines for your own programs,
then no registration is necessary, otherwise, you can specify your own
registration fee, depending on your anticipated use.
(Page 2)
REGISTRATION FOR MENURTNS.LIB
NAME:_____________________________________________
STREET:_____________________________________________
CITY:________________ STATE:__ ZIP CODE __________
SUGGESTED REGISTRATION FEES OUTLINE:
Personal Use: --------------- FREE
Light User: ----------------- $ 5.00
Moderate User: -------------- $10.00
Heavy User: ----------------- $15.00
Source Code: ---------------- $25.00
Diskette and Diskette Mailer: $ 2.50
or Send Diskette and Mailer
Please send registration form to:
Robert R. Smith
3812 Red Bud
Imperial, MO 63052-1161